home *** CD-ROM | disk | FTP | other *** search
Text File | 1998-11-03 | 23.4 KB | 1,015 lines |
- object frmMain: TfrmMain
- Left = 210
- Top = 103
- Width = 544
- Height = 450
- Caption = 'Easy skin generator (C)opyfree 1998 by Rob Vonk'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnActivate = FormActivate
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object ColorBox1: TColorBox
- Left = 488
- Top = 162
- Width = 25
- Height = 25
- Picture.Data = {<image000.bmp>}
- OnDblClick = ColorDblClick
- Red = 0
- Green = 0
- Blue = 128
- Color = clNavy
- OnColorChange = clr2ColorChange
- end
- object ColorBox2: TColorBox
- Left = 488
- Top = 146
- Width = 25
- Height = 25
- Picture.Data = {<image001.bmp>}
- OnDblClick = ColorDblClick
- Red = 0
- Green = 0
- Blue = 128
- Color = clNavy
- OnColorChange = clr2ColorChange
- end
- object PageControl1: TPageControl
- Left = 0
- Top = 0
- Width = 536
- Height = 423
- ActivePage = tabVisColor
- Align = alClient
- TabOrder = 0
- object tabVisColor: TTabSheet
- Caption = 'VisColor'
- ImageIndex = 4
- object imgVisColorMain: TImage
- Left = 242
- Top = 17
- Width = 275
- Height = 118
- IncrementalDisplay = True
- OnClick = imgVisColorMainClick
- OnMouseMove = imgVisColorMainMouseMove
- end
- object LabelRGB: TLabel
- Left = 8
- Top = 17
- Width = 84
- Height = 16
- Caption = 'Color (R, G, B)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object imgVisColorExample: TImage
- Left = 242
- Top = 140
- Width = 275
- Height = 118
- IncrementalDisplay = True
- end
- object clrCurrent: TColorBox
- Left = 200
- Top = 17
- Width = 25
- Height = 25
- Picture.Data = {<image002.bmp>}
- OnDragDrop = clrDragDrop
- OnMouseMove = clrMouseMove
- Red = 0
- Green = 0
- Blue = 0
- Color = clBlack
- end
- object clr1: TColorBox
- Left = 200
- Top = 44
- Width = 25
- Height = 25
- Picture.Data = {<image003.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 255
- Green = 255
- Blue = 255
- Color = clWhite
- OnColorChange = clr1ColorChange
- end
- object clr2: TColorBox
- Left = 200
- Top = 71
- Width = 25
- Height = 25
- Picture.Data = {<image004.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 0
- Green = 0
- Blue = 128
- Color = clNavy
- OnColorChange = clr2ColorChange
- end
- object Clr3: TColorBox
- Left = 200
- Top = 98
- Width = 25
- Height = 25
- Picture.Data = {<image005.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 255
- Green = 255
- Blue = 255
- Color = clWhite
- OnColorChange = ClrTextChange
- end
- object imgText: TImage
- Left = 240
- Top = 272
- Width = 155
- Height = 18
- Picture.Data = {<image006.bmp>}
- end
- object Clr4: TColorBox
- Left = 200
- Top = 125
- Width = 25
- Height = 25
- Picture.Data = {<image007.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 0
- Green = 0
- Blue = 128
- Color = clNavy
- OnColorChange = ClrTextChange
- end
- object imgNumbers: TImage
- Left = 240
- Top = 296
- Width = 99
- Height = 13
- Picture.Data = {<image008.bmp>}
- end
- object clr5: TColorBox
- Left = 200
- Top = 152
- Width = 25
- Height = 25
- Picture.Data = {<image009.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 255
- Green = 255
- Blue = 255
- Color = clWhite
- OnColorChange = clrNumbersChange
- end
- object clr6: TColorBox
- Left = 200
- Top = 179
- Width = 25
- Height = 25
- Picture.Data = {<image010.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 0
- Green = 0
- Blue = 128
- Color = clNavy
- OnColorChange = clrNumbersChange
- end
- object imgPlay: TImage
- Left = 240
- Top = 318
- Width = 42
- Height = 9
- AutoSize = True
- Picture.Data = {<image011.bmp>}
- end
- object Clr7: TColorBox
- Left = 200
- Top = 206
- Width = 25
- Height = 25
- Picture.Data = {<image012.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 255
- Green = 255
- Blue = 255
- Color = clWhite
- OnColorChange = ClrPlayChange
- end
- object Clr8: TColorBox
- Left = 200
- Top = 233
- Width = 25
- Height = 25
- Picture.Data = {<image013.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 0
- Green = 0
- Blue = 128
- Color = clNavy
- OnColorChange = ClrPlayChange
- end
- object clr9: TColorBox
- Left = 200
- Top = 260
- Width = 25
- Height = 25
- Picture.Data = {<image014.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 255
- Green = 0
- Blue = 0
- Color = clRed
- OnColorChange = clr1ColorChange
- end
- object clr10: TColorBox
- Left = 200
- Top = 287
- Width = 25
- Height = 25
- Picture.Data = {<image015.bmp>}
- OnDblClick = ColorDblClick
- OnDragDrop = clrDragDrop
- OnDragOver = clrDragOver
- OnMouseMove = clrMouseMove
- Red = 255
- Green = 255
- Blue = 255
- Color = clWhite
- OnColorChange = clr1ColorChange
- end
- object TrbVisualisation: TTrackBar
- Left = 168
- Top = 254
- Width = 30
- Height = 65
- Max = 16
- Orientation = trVertical
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 10
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = clr1ColorChange
- end
- object rabVisBack: TRadioButton
- Tag = 1
- Left = 8
- Top = 44
- Width = 185
- Height = 17
- Caption = 'Visualisation background'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = RadioButtonClick
- end
- object RabVisFore: TRadioButton
- Tag = 2
- Left = 8
- Top = 71
- Width = 185
- Height = 17
- Caption = 'Visualisation foreground'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = RadioButtonClick
- end
- object radTextBack: TRadioButton
- Tag = 3
- Left = 8
- Top = 98
- Width = 185
- Height = 17
- Caption = 'Text background'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = RadioButtonClick
- end
- object RadioButton1: TRadioButton
- Tag = 4
- Left = 8
- Top = 125
- Width = 185
- Height = 17
- Caption = 'Text foreground'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = RadioButtonClick
- end
- object RadioButton2: TRadioButton
- Tag = 5
- Left = 8
- Top = 152
- Width = 185
- Height = 17
- Caption = 'Numbers background'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = RadioButtonClick
- end
- object RadioButton3: TRadioButton
- Tag = 6
- Left = 8
- Top = 179
- Width = 185
- Height = 17
- Caption = 'Numbers foreground'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- OnClick = RadioButtonClick
- end
- object RadioButton4: TRadioButton
- Tag = 7
- Left = 8
- Top = 206
- Width = 185
- Height = 17
- Caption = 'Play background'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- OnClick = RadioButtonClick
- end
- object RadioButton5: TRadioButton
- Tag = 8
- Left = 8
- Top = 233
- Width = 185
- Height = 17
- Caption = 'Play foreground'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 7
- OnClick = RadioButtonClick
- end
- object RabVisBottom: TRadioButton
- Tag = 10
- Left = 8
- Top = 287
- Width = 153
- Height = 17
- Caption = 'Visualisation bottom'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 8
- OnClick = RadioButtonClick
- end
- object rabVisTop: TRadioButton
- Tag = 9
- Left = 8
- Top = 260
- Width = 137
- Height = 17
- Caption = 'Visualisation top'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 9
- OnClick = RadioButtonClick
- end
- object btnSaveVisual: TButton
- Left = 353
- Top = 361
- Width = 75
- Height = 25
- Caption = 'Save visual'
- TabOrder = 11
- OnClick = btnSaveVisualClick
- end
- object btnLoad: TButton
- Left = 19
- Top = 361
- Width = 75
- Height = 25
- Caption = 'Load main'
- TabOrder = 12
- OnClick = btnLoadClick
- end
- object btnLoadViscolor: TButton
- Left = 104
- Top = 361
- Width = 75
- Height = 25
- Caption = 'Load color'
- TabOrder = 13
- OnClick = btnLoadViscolorClick
- end
- end
- object TabMain: TTabSheet
- Caption = 'Main image'
- TabVisible = False
- object boxMain: TGroupBox
- Left = 11
- Top = 38
- Width = 295
- Height = 145
- Caption = 'Main bitmap'
- TabOrder = 0
- object imgMain: TImage
- Left = 10
- Top = 17
- Width = 275
- Height = 118
- IncrementalDisplay = True
- Picture.Data = {<image016.bmp>}
- end
- end
- object boxButtons: TGroupBox
- Left = 11
- Top = 193
- Width = 295
- Height = 145
- Caption = 'Extracted Buttons'
- TabOrder = 1
- object imgTitle: TImage
- Left = 11
- Top = 20
- Width = 275
- Height = 15
- end
- object imgVolume: TImage
- Left = 117
- Top = 77
- Width = 68
- Height = 15
- end
- object imgMono: TImage
- Left = 221
- Top = 61
- Width = 29
- Height = 12
- end
- object imgEQ: TImage
- Left = 229
- Top = 78
- Width = 46
- Height = 12
- end
- object imgReplay: TImage
- Left = 220
- Top = 109
- Width = 28
- Height = 15
- end
- object imgShuffle: TImage
- Left = 174
- Top = 109
- Width = 47
- Height = 15
- end
- object imgEject: TImage
- Left = 146
- Top = 109
- Width = 22
- Height = 16
- end
- object imgButtons: TImage
- Left = 26
- Top = 108
- Width = 114
- Height = 18
- end
- object imgSter: TImage
- Left = 249
- Top = 61
- Width = 29
- Height = 12
- end
- object imgMenu: TImage
- Left = 20
- Top = 42
- Width = 8
- Height = 43
- end
- object imgPosbar: TImage
- Left = 15
- Top = 94
- Width = 250
- Height = 10
- end
- end
- end
- object TabWinamp: TTabSheet
- Caption = 'Winamp bitmaps'
- object boxTitleBMP: TGroupBox
- Left = 9
- Top = 63
- Width = 364
- Height = 114
- Caption = 'Titlebar.bmp'
- TabOrder = 0
- object titlebar: TImage
- Left = 9
- Top = 17
- Width = 344
- Height = 87
- Picture.Data = {<image017.bmp>}
- PopupMenu = pmnSave
- end
- end
- object boxShufRepBMP: TGroupBox
- Left = 8
- Top = 227
- Width = 114
- Height = 116
- Caption = 'Shufrep.bmp'
- TabOrder = 1
- object shufrep: TImage
- Left = 11
- Top = 19
- Width = 92
- Height = 85
- PopupMenu = pmnSave
- end
- end
- object boxMonostereoBMP: TGroupBox
- Left = 291
- Top = 227
- Width = 83
- Height = 116
- Caption = 'Monoster.bmp'
- TabOrder = 2
- object monoster: TImage
- Left = 11
- Top = 19
- Width = 58
- Height = 24
- PopupMenu = pmnSave
- end
- end
- object boxButtonsBMP: TGroupBox
- Left = 129
- Top = 227
- Width = 156
- Height = 116
- Caption = 'Cbuttons.bmp'
- TabOrder = 3
- object CButtons: TImage
- Left = 11
- Top = 19
- Width = 136
- Height = 36
- PopupMenu = pmnSave
- end
- end
- object boxPosbarBMP: TGroupBox
- Left = 9
- Top = 179
- Width = 364
- Height = 38
- Caption = 'Posbar.bmp'
- TabOrder = 4
- object Posbar: TImage
- Left = 8
- Top = 17
- Width = 307
- Height = 10
- Picture.Data = {<image018.bmp>}
- PopupMenu = pmnSave
- end
- end
- object btnSave: TButton
- Left = 353
- Top = 361
- Width = 75
- Height = 25
- Caption = 'Save all'
- TabOrder = 5
- OnClick = btnSaveClick
- end
- object boxVolumeBMP: TGroupBox
- Left = 379
- Top = 7
- Width = 110
- Height = 336
- Caption = 'Volume.bmp'
- TabOrder = 6
- object ScrollBox1: TScrollBox
- Left = 9
- Top = 19
- Width = 91
- Height = 308
- HorzScrollBar.Visible = False
- BorderStyle = bsNone
- TabOrder = 0
- object volume: TImage
- Left = 3
- Top = 0
- Width = 70
- Height = 433
- Picture.Data = {<image019.bmp>}
- PopupMenu = pmnSave
- end
- end
- end
- object GroupBox1: TGroupBox
- Left = 195
- Top = 8
- Width = 177
- Height = 49
- Caption = 'Masks'
- TabOrder = 7
- object cmbMasks: TComboBox
- Left = 11
- Top = 16
- Width = 154
- Height = 21
- ItemHeight = 0
- TabOrder = 0
- Text = 'default'
- OnChange = cmbMasksChange
- end
- end
- object GroupBox2: TGroupBox
- Left = 11
- Top = 8
- Width = 177
- Height = 49
- Caption = 'Templates'
- TabOrder = 8
- object cmbTemplates: TComboBox
- Left = 11
- Top = 16
- Width = 154
- Height = 21
- ItemHeight = 0
- TabOrder = 0
- Text = 'default'
- OnChange = cmbTemplatesChange
- end
- end
- end
- object TabMask: TTabSheet
- Caption = 'Masks'
- TabVisible = False
- object boxMaskCButtons: TGroupBox
- Left = 133
- Top = 162
- Width = 157
- Height = 66
- Caption = 'Mask for CButtons'
- TabOrder = 0
- object imgMaskcbuttons: TImage
- Left = 11
- Top = 17
- Width = 136
- Height = 36
- Picture.Data = {<image020.bmp>}
- PopupMenu = pmnSave
- Transparent = True
- end
- end
- object boxMaskshufrep: TGroupBox
- Left = 12
- Top = 45
- Width = 113
- Height = 111
- Caption = 'Mask for Shufrep'
- TabOrder = 1
- object imgMaskShufRep: TImage
- Left = 8
- Top = 15
- Width = 92
- Height = 85
- Picture.Data = {<image021.bmp>}
- PopupMenu = pmnSave
- Transparent = True
- end
- end
- object boxMaskMonoster: TGroupBox
- Left = 12
- Top = 162
- Width = 111
- Height = 55
- Caption = 'Mask for Monoster'
- TabOrder = 2
- object imgMaskMonoSter: TImage
- Left = 8
- Top = 19
- Width = 58
- Height = 24
- Picture.Data = {<image022.bmp>}
- PopupMenu = pmnSave
- Transparent = True
- end
- end
- object boxMaskTitleBar: TGroupBox
- Left = 132
- Top = 45
- Width = 365
- Height = 111
- Caption = 'Mask for TitleBar'
- TabOrder = 3
- object imgMaskTitleBar: TImage
- Left = 9
- Top = 15
- Width = 344
- Height = 87
- Picture.Data = {<image023.bmp>}
- PopupMenu = pmnSave
- Transparent = True
- end
- end
- end
- object TabSettings: TTabSheet
- Caption = 'Settings'
- object txtWorkingdir: TLabel
- Left = 24
- Top = 24
- Width = 51
- Height = 13
- Caption = 'Workingdir'
- end
- object txtWinampDir: TLabel
- Left = 24
- Top = 56
- Width = 52
- Height = 13
- Caption = 'WinampDir'
- end
- object txtTemplateDir: TLabel
- Left = 24
- Top = 88
- Width = 57
- Height = 13
- Caption = 'TemplateDir'
- end
- object txtMaskDir: TLabel
- Left = 23
- Top = 118
- Width = 37
- Height = 13
- Caption = 'Maskdir'
- end
- object Label1: TLabel
- Left = 24
- Top = 176
- Width = 154
- Height = 13
- Caption = 'Easy skin generator 98 release 4'
- end
- object Label2: TLabel
- Left = 24
- Top = 192
- Width = 140
- Height = 13
- Caption = '(C)opyfree 1998 by Rob Vonk'
- end
- object Label3: TLabel
- Left = 24
- Top = 208
- Width = 140
- Height = 13
- Caption = 'Look for the latest release on:'
- end
- object Label4: TLabel
- Left = 24
- Top = 224
- Width = 236
- Height = 13
- Caption = 'http://members.tripod.com/~EasyMTU/index.html'
- end
- object Label5: TLabel
- Left = 24
- Top = 240
- Width = 390
- Height = 13
- Caption =
- 'You can send your (zipped) templates, (zipped) masks, help files' +
- ' and suggetions to:'
- end
- object Label6: TLabel
- Left = 24
- Top = 256
- Width = 79
- Height = 13
- Caption = 'Rob.Vonk@cmg'
- end
- object Label7: TLabel
- Left = 24
- Top = 272
- Width = 3
- Height = 13
- end
- object Label8: TLabel
- Left = 24
- Top = 272
- Width = 191
- Height = 13
- Caption = 'I'#39'll include nice ones into my next release'
- end
- object EditWinampDir: TEdit
- Left = 91
- Top = 56
- Width = 334
- Height = 21
- TabOrder = 0
- end
- object btnSaveSettings: TButton
- Left = 353
- Top = 361
- Width = 75
- Height = 25
- Caption = 'Save settings'
- TabOrder = 1
- OnClick = btnSaveSettingsClick
- end
- object btnWinampDir: TButton
- Left = 431
- Top = 56
- Width = 25
- Height = 21
- Caption = '..'
- TabOrder = 2
- OnClick = btnWinampDirClick
- end
- object EditWorkingdir: TEdit
- Left = 91
- Top = 24
- Width = 334
- Height = 21
- TabOrder = 3
- end
- object btnWorkingDir: TButton
- Left = 432
- Top = 24
- Width = 25
- Height = 21
- Caption = '..'
- TabOrder = 4
- OnClick = btnWorkingDirClick
- end
- object EditTemplateDir: TEdit
- Left = 91
- Top = 89
- Width = 334
- Height = 21
- TabOrder = 5
- OnChange = EditTemplateDirChange
- end
- object btnTemplateDir: TButton
- Left = 431
- Top = 89
- Width = 25
- Height = 21
- Caption = '..'
- TabOrder = 6
- OnClick = btnTemplateDirClick
- end
- object EditMaskDir: TEdit
- Left = 91
- Top = 118
- Width = 334
- Height = 21
- TabOrder = 7
- OnChange = EditMaskDirChange
- end
- object Button1: TButton
- Left = 431
- Top = 117
- Width = 25
- Height = 21
- Caption = '..'
- TabOrder = 8
- OnClick = Button1Click
- end
- end
- end
- object btnExit: TButton
- Left = 442
- Top = 385
- Width = 75
- Height = 25
- Caption = 'Exit'
- TabOrder = 1
- OnClick = btnExitClick
- end
- object dlgOpen: TOpenDialog
- Filter = 'Bitmap|*.bmp'
- Left = 270
- Top = 387
- end
- object dlgSave: TSaveDialog
- Filter = 'Bitmaps|*.bmp'
- Left = 299
- Top = 384
- end
- object pmnSave: TPopupMenu
- Left = 156
- Top = 346
- object mnuSave: TMenuItem
- Caption = 'Save as'
- OnClick = mnuSaveClick
- end
- end
- object dlgDirectory: TOpenDialog
- Left = 20
- Top = 344
- end
- object BrowseDirectoryDlg1: TBrowseDirectoryDlg
- Options = [bfDirectoriesOnly]
- Caption = 'Select Folder'
- ShowSelectionInStatus = False
- Left = 212
- Top = 387
- end
- object ColorDialog: TColorDialog
- Ctl3D = True
- Left = 116
- Top = 352
- end
- object OdlViscolor: TOpenDialog
- Filter = 'viscolor|viscolor.txt'
- Left = 220
- Top = 352
- end
- end
-